home *** CD-ROM | disk | FTP | other *** search
/ Invenzioni & Inventori / Invenzioni and Inventori (Eclectica Publishing) (1996).ISO / invenzio / extraurb / mi036.dir / 00044_Script_44 < prev    next >
Text File  |  1983-02-02  |  510b  |  26 lines
  1. --on exitFrame
  2. --  global scrolla, pallina, dove, a_blocca, audio,rsc
  3. --  scu
  4. --  set dove =0
  5. --  set pallina to 68
  6. --  set audio to 66
  7. --  set the castnum of sprite 40 to 68
  8. --  vitt 22,29
  9. --  vif 35
  10. --  updatestage
  11. --end
  12.  
  13. on enterFrame
  14.   sound close 1
  15.   global pallina, dove,gr,a_blocca,audio
  16.   set gr=false
  17.   set pallina to 68
  18.   set audio to 66
  19.   set the castnum of sprite 40 to 68
  20.   set dove =0
  21.   set a_blocca to false
  22.   vitt 22,29
  23.   vif 36
  24.   def_video 197,48,29,28,36
  25.   end if
  26. end